home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
misc
/
math
/
VintEval_src.lha
/
VintEval
/
Vint-Eng.teksten.S
next >
Wrap
Text File
|
1996-12-06
|
2KB
|
70 lines
_CON dc.b 'CON:0/0/640/198/VInts © 1996 by MVW',0
_Mem dc.b 'Memory : %ld bytes',10,0
_weg dc.b 'Warning : %d unused numbers have been discarded',10,0
_LF dc.b 10,0
FG MACRO
dc.b 27,'[3\1m'
endM
_help
dc.b '----------- Help of VIntEval © 1996 by Maurice van Wanum -----------'
dc.b 10,10
dc.b 'VIntEval is a simple postfix evaluator for VInts. VInts are',10
dc.b 'unsigned integers with a variable length up to 315,000 digits.',10,10
dc.b 'The instruction format is '
FG 2
dc.b 'operand'
FG 1
dc.b ' ['
FG 2
dc.b 'operand'
FG 1
dc.b '] '
FG 2
dc.b 'operator'
FG 1
dc.b ', eg. 4 5 +',10
dc.b 'Valid '
FG 2
dc.b 'operands'
FG 1
dc.b ' are numbers and the variables A, B and C.',10
dc.b 'Valid '
FG 2
dc.b 'operators'
FG 1
dc.b ' are : + - * / % = ! ^',10,10
dc.b 'Other instructions are :',10
dc.b 9,'M print available memory',10
dc.b 9,'? print this help-text',10
dc.b 9,"; don't print results (to save time)",10
dc.b 9,'>'
FG 2
dc.b 'filename'
FG 1
dc.b ' send output to '
FG 2
dc.b 'filename'
FG 1
dc.b 10
dc.b 9,'<'
FG 2
dc.b 'filename'
FG 1
dc.b ' get input from '
FG 2
dc.b 'filename'
FG 1
dc.b 10
dc.b 9,'x exit program or close input/output-file',10
dc.b 10
dc.b 'Send bugreports etc. to : M.van Wanum',10
dc.b 9,9,9,' Julianastraat 26',10
dc.b 9,9,9,' 3361 XH Sliedrecht',10
dc.b 9,9,9,' Holland',10
dc.b 9,9,' E-mail : M.vanWanum@et.tudelft.nl',10,0
_ong dc.b 'Invalid expression',10,0
_error dc.b 'Evaluation failed',10,0
_IOerr dc.b "I/O channel can't be opened",10,0
_Prompt dc.b '>> ',0